From b586a035c88f9dcff439db72001ad2f2478586b7 Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Tue, 4 Dec 2012 01:38:56 +0200 Subject: [PATCH] * lisp/info.el (Info-fontify-node): Don't hide the last newline. --- lisp/ChangeLog | 5 +++++ lisp/info.el | 4 ++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 328e21cfa96..95c361ede96 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2012-12-03 Juri Linkov + + * info.el (Info-fontify-node): Don't hide the last newline. + (Bug#12272) + 2012-12-01 Leo Liu * files.el (dir-locals-read-from-file): Check file non-empty diff --git a/lisp/info.el b/lisp/info.el index 36ffa806f04..1e15dcbc9a0 100644 --- a/lisp/info.el +++ b/lisp/info.el @@ -4826,8 +4826,8 @@ first line or header line, and for breadcrumb links.") ;; Hide empty lines at the end of the node. (goto-char (point-max)) (skip-chars-backward "\n") - (when (< (1+ (point)) (point-max)) - (put-text-property (1+ (point)) (point-max) 'invisible t)) + (when (< (point) (1- (point-max))) + (put-text-property (point) (1- (point-max)) 'invisible t)) (set-buffer-modified-p nil)))) -- 2.30.2